[<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
>> Sample D'Bridge batch file <<
>> (c) Mark Anderson, Dregal RemoteAccess [2:259/11] <<

   ECHO Off

   ECHO    /--------------------------------------------------------\
   ECHO    |         Dregal RemoteAccess BBS via D'Bridge           |
   ECHO    |                      Running !!                        |
   ECHO    \--------------------------------------------------------/


   :VDISK
     IF EXIST F:DONE.TXT GOTO START
     F:
     MD TXTFILES
     MD MENUS_1
     MD MENUS_2
     COPY V:\RA\TXTFILES\*.* F:\TXTFILES
     COPY V:\RA\MENUS_1\*.* F:\MENUS_1
     COPY V:\RA\MENUS_2\*.* F:\MENUS_2
     ECHO DONE>DONE.TXT

   :START
     V:
     CD \DB\FILES
     IF EXIST ????????.TIC GOTO TIC
     CD \DB
     DB.EXE
       IF ERRORLEVEL 192 GOTO 19200_BAUD
       IF ERRORLEVEL 97 GOTO LOCAL_BAUD
       IF ERRORLEVEL 96 GOTO 9600_BAUD
       IF ERRORLEVEL 24 GOTO 2400_BAUD
       IF ERRORLEVEL 12 GOTO 1200_BAUD
       IF ERRORLEVEL 03 GOTO 300_BAUD
       IF ERRORLEVEL 1  GOTO END
       IF ERRORLEVEL 0  GOTO END
       GOTO START

   :TIC
     G:
     CD \UTILS\NORTON
     FD V:\DB\FILES\*.*
     X:
     CD \FILES\TICK
     RAID.EXE -RH
     TICK.EXE >>TIC.LOG
     V:
     CD \DB
     FIDO2DB.EXE V:\DB\NETMAIL\
     GOTO START

   :19200_BAUD
     V:
     CD \RA
     RA -B19200 -E0 -D
     GOTO AFTER_RA

   :9600_BAUD
      V:
      CD \RA
      RA -B9600 -E0 -D
      GOTO AFTER_RA

   :LOCAL_BAUD
      V:
      CD \RA
      RA -L -D
      GOTO AFTER_RA

   :2400_BAUD
      V:
      CD \RA
      RA -B2400 -E0 -D
      GOTO AFTER_RA

   :1275_BAUD
      V:
      CD \RA
      RA -B1275 -E0 -D
      GOTO AFTER_RA

   :1200_BAUD
      V:
      CD \RA
      RA -B1200 -E0 -D
      GOTO AFTER_RA

   :300_BAUD
      V:
      CD \RA
      RA -B300 -E0 -D
      GOTO AFTER_RA


   :After_RA
     V:
     CD \QMX
     COPY 7448????.* V:\DB\FILES
     DEL 7448????.*
     CD \RA\UTILS\USA
     COPY F:\TXTFILES\USA*.* V:\RA\TXTFILES
     USA.EXE
     CD \RA
     MBUTIL EXPORT #10 V:\DB\NETMAIL -REPORT
     MBUTIL IMPORT V:\DB\NETMAIL #10
     AMUTIL
     GOTO START

   :END
   ECHO    /--------------------------------------------------------\
   ECHO    |         Dregal RemoteAccess BBS via D'Bridge           |
   ECHO    |                   Closed Down !!                       |
   ECHO    \--------------------------------------------------------/

This page created by ng2html v1.05, the Norton guide to HTML conversion utility. Written by Dave Pearson